unit uSAF0201_06;

interface

uses
   Windows,
   Messages,
   SysUtils,
   Variants,
   Classes,
   Graphics,
   Controls,
   Forms,
   Dialogs,
   ComCtrls,
   Menus,
   ActnList,
   ExtCtrls,
   DB,
   ADODB,
   DBCtrls,
   StdCtrls,
   WideStrings,
   FMTBcd,
   RxToolEdit,
   RxDBCtrl,
   Buttons,
   DBGrids,
   ImgList,
   ToolWin,
   Grids,
   Mask,
   DateUtils;

type
   TfrmInsUpdContratoProdutor = class(TForm)
      pnlCentro: TPanel;
      dsTabela: TDataSource;
      pnlInferior: TPanel;
      statPrincipal: TStatusBar;
      ilInsUpd: TImageList;
      tlbPrincipal: TToolBar;
      btnInserir: TToolButton;
      btnEditar: TToolButton;
      btnDeletar: TToolButton;
      btnConsultar: TToolButton;
      btnValidar: TToolButton;
      btnImprimir: TToolButton;
      btnS1: TToolButton;
      btnExportar: TToolButton;
      btnS2: TToolButton;
      btnFechar: TToolButton;
      btnS3: TToolButton;
      dbnvgrLista: TDBNavigator;
      lblContratoProdutor: TLabel;
      dbgrdContratoProdutor: TDBGrid;
      bvl1: TBevel;
      lblSelecionaProdutor: TLabel;
      edtBuscarProdutor: TEdit;
      btnBuscarProdutor: TBitBtn;

   private

      { Private declarations }

   public

      _INSUPD_TIPO: Integer;
      _INSUPD_ID: Integer;

      { Public declarations }

   end;

var
   frmInsUpdContratoProdutor: TfrmInsUpdContratoProdutor;

implementation

{$R *.dfm}

uses
   uLibGlobal,
   uSAF0201_01,
   uSAF0201_02,
   uSAF0201_03,
   uSAF0201_04,
   uSAF0201_05;

end.

